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procedure COMPUTEMlNERROR( Aggregate x, Aggregate y t integer I) 

1 . if subTreefx, y, /] .computed = true 

2. return [subTreefx, y, /J.error, subTreefx, y, /]. aggregates] 

3. minError := miriErrorl := minError2 := oo 

4. if x is a leaf { 

5. minErrorl := T, seS D(s, t) * (lsp(s, x, {y}, W A ) - lsp{s, x)) 

6. if/>0 

7. minError2 := E se5 £>(s, t) * (lsp(s, x, {x}, W A ~) - lsp{s, x)) 

8. if minErrorl <minError2 

9. [subTreefx, y r /J.error, subTreefx, y, /]. aggregates] := [minErrorl, 0] 

10. else 

11. [subTree[x, y, /]. error, subTreejx, y, /]. aggregates] := [minError2, {x}] 

12. } 

13.if x has a single child u { 

14. [minErrorl, aggregates 1] := C0MPUTEMinERR0R(m, y, I) 

15. if/>0 

16. [rninError2 > aggregates2] := COMPUTEMlNERROR(«, x, I - 1) 

17. if minErrorl < minError2 

18. [subTreefx, y, fj.error, subTreefx, y, /].aggregates] := [minErrorl, aggregatesl] 

19. else 

20. [subTree[x, y, /].error, subTreefx, y, /]. aggregates] := [minError2, aggregates2 ^> {x}] 

21. } 

22. if x has children u and v { 

23. for i := 0 to / { 

24. [minErrorl, aggregatesl] := CoMPUTEMinError(m, y, i) 

25. [minError2, aggregates2] := CoMPUTEMinError(v, y, k - i) 

26. if minErrorl + minError2 < minError 

27. minError := minErrorl + minError2 

28. aggregates := aggregatesl u> aggregates2 

29. } 

30. for ; :=0to/-l { 

3 1 . [minErrorl, aggregates 1 ] := C0MPUTEMinErR0R(w, x, i) 

32. [minError2, aggregates2] := COMPUTEMlNERROR(v, x, k - i - 1) 

33. if minErrorl + minError2 < minError 

34. minError := minErrorl + minError2 

35. aggregates := aggregatesl <j aggregates2 <u {x} 

36. } 

37. [subTree[x, y, /]. error, subTreefx, y, /]. aggregates] := [minError, aggregates] 

38. } 

39. subTree[x, y, /].computed := true 

40. return [subTreefx, y, f). error, subTreefx y, l\. aggregates] 
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procedure COMBINEMlNERROR() 

1 . for i = 1 to m 

2. for j = 0 to k { 

3. Wl [error, aggregates] := COMPUTEMlNERROR(r(7", ), e,y) 

4. Xi[/'].[error, aggregates] := [ «> , 0] 
5- } 

6. for/ = 0to& 

7 . Xi [f] . [error, aggregates] := T, [/] . [error, aggregates] 

8. for / = 1 to m 

9. for j = 0tok 

10. for / = 0 toy 

11. if [/] .error + T;[/ - /] .error < Xfc] .error) { 

12. J£[/]. error = Jif M [/]. error + T t \j - /]. error 

13. ^[/] .aggregates = X M [/]. aggregates u - /].aggregates 

14. } 
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procedure COMPUTEW EIGHTSCUMULATIVE () 

1. for each b e B r set W mm (b) : = 0 

2. for i :=1 to r { 

3. W := 

4. Choose a random subset i? <Z J?, of ABRs 

5. for each b e i? set JF(Z>) to a random weight in [0, Z,] 

6. if H^seis, B(s, W)) < S J6 *c (5, JF mi - B )) 
7- JF m /„ := 

8. } 

9. return 



procedure ComputeWeightsMax(Q) 
1 .for each b <= B f set Wold(b) := 0 
2. while (P6 2 B 

1 Wold(b) < ( 

j*,j*G**j-i) 

2 ) *Ispmax) f3. Let 

QO be a new set of inequalities that result when the value Wold(b) is 
substituted for each variable W (b)only on the LHS of each inequality in 
Q 4. Set Wnew(b) to the smallest possible value such that each 
inequality in QO is satisfied when Wnew(b) is substituted for variable W 
(b) in QO 5. if Wnew= Wold 6. return Wnew 7. else 8. Wold := Wnew 
9.g 10. return "there does not exist a weight assignment W" 
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procedure COMPUTEWEIGHTSTwoABR() 

1. Set V opt := vOO, E :=E opt := Zs^se(s, b l ) 

2. for j:=\ to n { 

3. E:=E + e(sj, bi) - e( Sj , bfi 

4. HE<E opt 

5- V opt := v(j J+1) , E 0pt := E 

6. } 

7. return V opt 



